0 :REM ** D.MUNSHAW ** 1 : 2 :REM ORIGINAL PROGRAM 05/83 3 :REM FOR AIMEE & FRIENDS 4 : 5 A=41:B=26:C=2:POKE53280,0:POKE53281,0:GOSUB5000 10 PRINT"[147]":FORI=1024TO1540STEP41:A=A-2:B=B-2:C=C+1 20 FORZ=0TOA:POKEI+Z+54272,C:POKEI+Z,81:NEXTZ 30 FORZ=0TO(B*40)STEP40:POKEI+A+Z+54272,C:POKEI+A+Z,81:NEXTZ 40 FORZ=(B*40+A)TO(B*40)STEP-1:POKEI+Z+54272,C:POKEI+Z,81:NEXTZ 50 FORZ=(B*40)TO0STEP-40:POKEI+Z+54272,C:POKEI+Z,81:NEXTZ 55 NEXTI:C=7:G=15:FORT=1TO12:RESTORE:C=C+8:G=G-1 60 FORD=0TO15:POKEHF,D*12:POKELF,200:READE:POKE1516+D+54272,C:POKE1516+D,E:NEXT 65 POKELF,0:POKEHF,0 70 FORD=0TO16:READE:POKE1915+D,E:NEXT 80 DATA32,5,7,7,19,32,1,18,5,32 85 DATA7,18,5,1,20,32,32,4,46,13 90 DATA21,14,19,8,1,23,32,48,53 95 DATA47,56,51,32 100 DATA81,81,81,81,81,81,81,81,81,81,81,81,81,81,81,81 110 FORD=0TO15:READE:POKE1516+D+54272,G:POKE1516+D,E:NEXT 120 NEXTT 140 PRINT"[147]":GOSUB6000:POKEV+21,1:GOSUB7000 150 REM INSTRUCTIONS 151 : 155 PRINTTAB(15)"[158]EGGS ARE GREAT" 160 PRINT"[159] F1 [146] CLEARS SCREEN" 165 PRINT"[159] F7 [146] TO QUIT" 170 PRINT" [159]_234567890+-\[146]" 175 PRINT" TO CHANGE COLOURS" 180 PRINT"USE JOYSTICK PORT #2 & [150]FIRE BUTTON" " 185 [153]"  SPACE WAIT TO ERASE" 190 [129]T[178]1[164]9000:[130]T:[153]"LOAD" 200 [143] ** MAIN ROUTINE ** 201 : 240 SY[178]81:CO[178]1 250 X%[178][194](53248):Y%[178][194](53249) 252 [151]54276,65:[151]LF,0:[151]HF,0:[151]V[170]29,0 255 [139][194](53264)[175]1[178]1[167]X%[178]X%[170]255 260 Z%[178]824[170](([181]((Y%[170]5)[173]8)[172]40)[170][181](X%)[173]8) 270 [139][171](([194](56320)[175]16)[178]0)[178]1[167]341 300 A%[178][194](197):[139]A%[178]64[167]250 310 [139]A%[178]60[167]SY[178]32:S1[178]100:[151]54276,129:[137]350 320 [139]A%[178]56[167] CO[178]15:[137]250 321 [139]A%[178]59[167] CO[178]1:[137]250 322 [139]A%[178]8[167] CO[178]2:[137]250 323 [139]A%[178]11[167] CO[178]3:[137]250 324 [139]A%[178]16[167] CO[178]4:[137]250 325 [139]A%[178]19[167] CO[178]5:[137]250 326 [139]A%[178]24[167] CO[178]6:[137]250 327 [139]A%[178]27[167] CO[178]7:[137]250 328 [139]A%[178]32[167] CO[178]8:[137]250 329 [139]A%[178]35[167] CO[178]9:[137]250 330 [139]A%[178]57[167] CO[178]10:[137]250 331 [139]A%[178]40[167] CO[178]11:[137]250 332 [139]A%[178]43[167] CO[178]12:[137]250 333 [139]A%[178]48[167] CO[178]13:[137]250 334 [139]A%[178]35[167] CO[178]14:[137]250 335 [139]A%[178]4[167] [153]"LOAD":[137]250 336 [139]A%[179][177]3[167] 250 337 [153]"LOADBYE BYE CHICKADEE":[151]V[170]21,0:[151]54296,0 338 [143] 339 [128] 340 [137]250 341 SY[178]81:S1[178]10:[139][194](Z%)[178]81[167]250 350 [151]HF,S1:[151]LF,100:[151]Z%[170]54272,CO:[151]Z%,SY 360 [139]S1[177]20[167][137]250 370 [151]V[170]29,1:[129]T[178]5[164]2[169][171]1:[151]HF,S1[172]T:[130]:[137]250 5000 [143] INNIALIZE SOUND 5001 : 5010 HF[178]54273:LF[178]HF[171]1 5020 [151]54275,2:[151]54274,100 5030 [151]54277,128:[151]54278,32 5040 [151]54296,15:[151]54276,65 5050 [142] 6000 [143] SPRITE DATA 6001 : 6010 V[178]53248 6020 [129]I[178]12288[164]12350:[135]E:[151]I,E:[130] I:[151]2040,192 6030 [151]V[170]28,1:[151]V[170]39,2:[151]V[170]37,7:[151]V[170]38,3 6050 [142] 6060 [131]0,0,0,0,0,0,0,0,0 6061 [131]0,0,0,0,0,0,0,0,0 6062 [131]2,192,0,9,128,0,10,128,0 6063 [131]14,128,0,62,128,0,2,160,1 6064 [131]0,170,4,0,42,144,0,165,168 6065 [131]0,41,96,0,42,128,0,51,0 6066 [131]0,204,192,0,0,0,0,0,0 7000 [143] ORIGINAL J.KAMINSKI 83-04-28 7001 : 7010 LO[178]12[172]16[172]256:[143] $C000 7020 [129] I[178]49152 [164] 49344:[135]J:[151]I,J:[130] I 7030 [151] LO[170]3,1 :[143] SPEED (S 1-10 F) 7040 [158] LO[170]16 :[143] ENABLE ML/JOY 2 7050 [142] 7070 [131] 150, 220, 0, 1, 1 7071 [131] 0, 0, 0, 0, 0 7072 [131] 0, 0, 0, 0, 0 7073 [131] 0, 120, 169, 32, 141 7074 [131] 20, 3, 169, 192, 141 7075 [131] 21, 3, 88, 96, 234 7076 [131] 234, 234, 8, 72, 138 7077 [131] 72, 152, 72, 234, 173 7078 [131] 0, 220, 160, 0, 162 7079 [131] 0, 74, 176, 3, 206 7080 [131] 1, 192, 74, 176, 3 7081 [131] 238, 1, 192, 74, 176 7082 [131] 13, 206, 0, 192, 174 7083 [131] 0, 192, 224, 255, 208 7084 [131] 3, 206, 2, 192, 74 7085 [131] 176, 8, 238, 0, 192 7086 [131] 208, 3, 238, 2, 192 7087 [131] 234, 173, 1, 192, 201 7088 [131] 35, 208, 3, 238, 1 7089 [131] 192, 201, 230, 208, 3 7090 [131] 206, 1, 192, 234, 173 7091 [131] 2, 192, 240, 12, 173 7092 [131] 0, 192, 201, 60, 208 7093 [131] 15, 206, 0, 192, 208 7094 [131] 10, 173, 0, 192, 201 7095 [131] 5, 208, 3, 238, 0 7096 [131] 192, 173, 0, 192, 141 7097 [131] 0, 208, 173, 1, 192 7098 [131] 141, 1, 208, 173, 2 7099 [131] 192, 240, 9, 13, 16 7100 [131] 208, 141, 16, 208, 56 7101 [131] 176, 8, 169, 254, 45 7102 [131] 16, 208, 141, 16, 208 7103 [131] 234, 206, 4, 192, 240 7104 [131] 3, 76, 39, 192, 173 7105 [131] 3, 192, 141, 4, 192 7106 [131] 104, 168, 104, 170, 104 7107 [131] 40, 76, 49, 234, 234 7108 [131] 234, 0, 0 60000 [153]"LOAD";[194](197):[137]60000